#include <iostream>
#include <cstring>

#include <pthread.h>
#include <sys/types.h>
#include <sys/socket.h>
#include <netinet/in.h>
#include <arpa/inet.h>
#include <sys/wait.h>

#include "Log.hpp"
#include "nocopy.hpp"
#include "comm.hpp"
#include "InetAddr.hpp"

const static int default_backlog = 1;
class TcpServer;

class ThreadData
{
public:
    ThreadData(int sock, TcpServer *ptr, struct sockaddr_in &peer)
    :sockfd(sock),  svr_ptr(ptr), addr(peer)
    {}
    int SockFd() {return sockfd;}
    TcpServer *GetServer() { return svr_ptr;};
    ~ThreadData()
    {
        close(sockfd);
    }
private:
    int sockfd;
    TcpServer* svr_ptr;
public:
    InetAddr addr;
};

class TcpServer : public nocopy
{
public:
    // 构造函数
    TcpServer(uint16_t port)
        : _port(port), _isrunning(false)
    {
    }
    void Init()
    {
        // 1、创建套接字（socket）
        _listensock = socket(AF_INET, SOCK_STREAM, 0);
        if (_listensock < 0)
        {
            lg.LogMessage(Fatal, "create socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Fatal);
        }

        // 固定写法，解决一些少量的bind失败的问题
        // 设置 SO_REUSEADDR 选项,允许重用本地地址和端口。
        int opt = 1;
        setsockopt(_listensock, SOL_SOCKET, SO_REUSEADDR | SO_REUSEPORT, &opt, sizeof(opt));

        // 2、绑定网络（bind）
        struct sockaddr_in local;
        memset(&local, 0, sizeof(local));
        local.sin_family = AF_INET;
        local.sin_port = htons(_port);
        local.sin_addr.s_addr = htonl(INADDR_ANY);

        // 2.1、bind
        if (bind(_listensock, CONV(&local), sizeof(local)) != 0)
        {
            lg.LogMessage(Fatal, "bind socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Bind_Err);
        }
        lg.LogMessage(Debug, "bind socket success, sockfd: %d\n", _listensock);

        // 3、设置socket为监听状态，tcp特有的（listen）
        if (listen(_listensock, default_backlog) != 0)
        {
            lg.LogMessage(Fatal, "listen socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
            exit(Listen_Err);
        }
        lg.LogMessage(Debug, "listen socket success, sockfd: %d\n", _listensock);
    }

    // Tcp 连接全双工通信的
    // void Service(int sockfd)
    // {
    //     // 进程的，v1-v3
    //     char buffer[1024];
    //     // 一直进行IO
    //     while (true)
    //     {
    //         ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1);
    //         if (n > 0)
    //         {
    //             buffer[n] = 0;
    //             std::cout << "client say# " << buffer << std::endl;
    //             std::string echo_string = "server echo# ";
    //             echo_string += buffer;
    //             write(sockfd, echo_string.c_str(), echo_string.size());
    //         }
    //         else if (n == 0) // read如果返回值是0，表示读到了文件结尾(对端关闭了连接！)
    //         {
    //             lg.LogMessage(Info, "client quit...\n");
    //             break;
    //         }
    //         else
    //         {
    //             lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
    //             break;
    //         }
    //     }
    // }
    void Service(int sockfd, InetAddr addr)
    {
        char buffer[1024];

        // 一直进行IO
        while (true)
        {
            ssize_t n = read(sockfd, buffer, sizeof(buffer) - 1);
            if (n > 0)
            {
                buffer[n] = 0;
                std::cout << addr.PrintDebug() << "# " << buffer << std::endl;

                std::string echo_string = "server echo# ";
                echo_string += buffer;
                write(sockfd, echo_string.c_str(), echo_string.size());
            }
            else if (n == 0) // read如果返回值是0，表示读到了文件结尾(对端关闭了连接！)
            {
                lg.LogMessage(Info, "client quit...\n");
                break;
            }
            else
            {
                lg.LogMessage(Error, "read socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
                break;
            }
        }
    }
    static void *HandlerRequest(void *args) // this
    {
        pthread_detach(pthread_self());
        ThreadData *td = static_cast<ThreadData*>(args);
        td->GetServer()->Service(td->SockFd(), td->addr);
        delete td;
        return nullptr;
    }
    void Start()
    {
        _isrunning = true;
        while (_isrunning)
        {
            sleep(1);
            // 4、获取连接
            struct sockaddr_in peer;
            socklen_t len = sizeof(peer);
            int sockfd = accept(_listensock, CONV(&peer), &len);
            if (sockfd < 0)
            {
                lg.LogMessage(Warning, "accept socket error, errno code: %d, error string: %s\n", errno, strerror(errno));
                continue;
            }
            lg.LogMessage(Debug, "accept success, get n new sockfd: %d\n", sockfd);

            // 5、提供服务,五种方法
            // v1(单进程)
            // Service(sockfd);
            // close(sockfd); // 故意关掉了

            // v2(多进程)
            // pid_t id = fork();
            // if (id < 0)
            // {
            //     // 创建子进程失败
            //     close(sockfd);
            //     continue;
            // }
            // else if (id == 0)
            // {
            //     // 子进程
            //     close(_listensock);
            //     if (fork() > 0)
            //         exit(0);

            //     // 孙子进程(孤儿进程)，被系统领养，正常处理
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            //     pid_t rid = waitpid(id, nullptr, 0);
            //     if (rid == id)
            //     {
            //         // do nothing
            //     }
            // }

            // v3(多进程--信号版)
            // pid_t id = fork();
            // if (id < 0)
            // {
            //     close(sockfd);
            //     continue;
            // }
            // else if (id == 0)
            // {
            //     // child
            //     close(_listensock);
            //     Service(sockfd);
            //     close(sockfd);
            //     exit(0);
            // }
            // else
            // {
            //     close(sockfd);
            //     // 父进程不想等待呢？
            //     // 使用sigal函数，signal(SIGCHLD,SIG_IGN);
            //     // 忽略SIGCHLD信号，SIGCHLD是一个信号常量，
            //     // 代表子进程状态发生改变时（如终止、暂停或继续）发送给父进程的信号。
            //     // 在Linux环境中，如果对SIG_IGN进行忽略，子进程退出的时候，自动释放自己的资源
            // }

            // v4(多线程)
            ThreadData *td = new ThreadData(sockfd, this, peer);
            pthread_t tid;
            pthread_create(&tid, nullptr, HandlerRequest, td);
            // 主线程和新线程，不需要关闭所谓文件描述符, 将线程设置为分离

            // v5(线程池)-- 不能让我们的服务器，提供长服务
            // task_t t = std::bind(&TcpServer::Routine, this, sockfd, InetAddr(peer));
            // ThreadNs::ThreadPool<task_t>::GetInstance()->Push(t);
        }
    }
    // 析构函数
    ~TcpServer()
    {
    }

private:
    uint16_t _port;  // 端口号
    int _listensock; // 文件描述符
    bool _isrunning;
};